(rsh): Add `host' to args passed to make-comint.

diff --git a/lisp/telnet.el b/lisp/telnet.el
index 4422c17032d381222f13bb43ed885d481972f720..e1146a8eedfd6175b3a011445128ba0d02af43cd 100644 (file)
--- a/lisp/telnet.el
+++ b/lisp/telnet.el
@@ -215,7 +215,7 @@ Normally input is edited in Emacs and sent a line at a time."
   (interactive "sOpen rsh connection to host: ")
   (require 'shell)
   (let ((name (concat host "-rsh" )))
-    (switch-to-buffer (make-comint name "rsh"))
+    (switch-to-buffer (make-comint name "rsh" nil host))
     (set-process-filter (get-process name) 'telnet-initial-filter)
     (telnet-mode)
     (setq telnet-count -16)))